package com.sari.common.utils.excel;

import com.google.common.collect.Lists;
import com.sari.common.utils.Collections3;
import com.sari.common.utils.Reflections;
import com.sari.common.utils.excel.annotation.ExcelField;
import org.apache.commons.lang3.StringUtils;
import org.apache.poi.hssf.usermodel.HSSFCell;
import org.apache.poi.hssf.usermodel.HSSFClientAnchor;
import org.apache.poi.hssf.usermodel.HSSFPatriarch;
import org.apache.poi.hssf.usermodel.HSSFWorkbook;
import org.apache.poi.ss.usermodel.*;
import org.apache.poi.ss.util.CellRangeAddress;
import org.apache.poi.xssf.streaming.SXSSFWorkbook;
import org.apache.poi.xssf.usermodel.XSSFClientAnchor;
import org.apache.poi.xssf.usermodel.XSSFRichTextString;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

import javax.imageio.ImageIO;
import javax.servlet.http.HttpServletResponse;
import java.awt.image.BufferedImage;
import java.io.*;
import java.lang.reflect.Field;
import java.lang.reflect.Method;
import java.util.*;

/**
 * 导出Excel文件（导出“XLSX”格式，支持大数据量导出   @see org.apache.poi.ss.SpreadsheetVersion）
 */
public class ExportExcel {

    private static Logger log = LoggerFactory.getLogger(ExportExcel.class);

    /**
     * 工作薄对象
     */
    private SXSSFWorkbook wb;


    /**
     * 工作表对象
     */
    private Sheet sheet;

    private Sheet[] sheets;

    /**
     * 样式列表
     */
    private Map<String, CellStyle> styles;

    /**
     * 当前行号
     */
    private int rownum;

    /**
     * 列信息
     */
    private List<ColModel> colModels = Lists.newArrayList();


    private Map<String, Integer> align = new HashMap<String, Integer>() {{
        put("left", 1);
        put("center", 2);
        put("right", 3);
    }};

    /**
     * 注解列表（Object[]{ ExcelField, Field/Method }）
     */
    List<Object[]> annotationList = Lists.newArrayList();


    /**
     * 构造函数
     *
     * @param title 表格标题，传“空值”，表示无标题
     * @param cls   实体对象，通过annotation.ExportField获取标题
     */
    public ExportExcel(String title, Class<?> cls) {
        this(title, cls, 1);
    }

    /**
     * 构造函数
     *
     * @param title  表格标题，传“空值”，表示无标题
     * @param cls    实体对象，通过annotation.ExportField获取标题
     * @param type   导出类型（1:导出数据；2：导出模板）
     * @param groups 导入分组
     */
    public ExportExcel(String title, Class<?> cls, int type, int... groups) {
        // Get annotation field
        Field[] fs = cls.getDeclaredFields();
        for (Field f : fs) {
            ExcelField ef = f.getAnnotation(ExcelField.class);
            if (ef != null && (ef.type() == 0 || ef.type() == type)) {
                if (groups != null && groups.length > 0) {
                    boolean inGroup = false;
                    for (int g : groups) {
                        if (inGroup) {
                            break;
                        }
                        for (int efg : ef.groups()) {
                            if (g == efg) {
                                inGroup = true;
                                annotationList.add(new Object[]{ef, f});
                                break;
                            }
                        }
                    }
                } else {
                    annotationList.add(new Object[]{ef, f});
                }
            }
        }
        // Get annotation method
        Method[] ms = cls.getDeclaredMethods();
        for (Method m : ms) {
            ExcelField ef = m.getAnnotation(ExcelField.class);
            if (ef != null && (ef.type() == 0 || ef.type() == type)) {
                if (groups != null && groups.length > 0) {
                    boolean inGroup = false;
                    for (int g : groups) {
                        if (inGroup) {
                            break;
                        }
                        for (int efg : ef.groups()) {
                            if (g == efg) {
                                inGroup = true;
                                annotationList.add(new Object[]{ef, m});
                                break;
                            }
                        }
                    }
                } else {
                    annotationList.add(new Object[]{ef, m});
                }
            }
        }
        // Field sorting
        Collections.sort(annotationList, new Comparator<Object[]>() {
            public int compare(Object[] o1, Object[] o2) {
                return new Integer(((ExcelField) o1[0]).sort()).compareTo(
                        new Integer(((ExcelField) o2[0]).sort()));
            }
        });
        // Initialize
        List<ColModel> colModelList = Lists.newArrayList();
        for (Object[] os : annotationList) {
            ColModel colModel = new ColModel();
            String t = ((ExcelField) os[0]).title();
            // 如果是导出，则去掉注释
            if (type == 1) {
                String[] ss = StringUtils.split(t, "**", 2);
                if (ss.length == 2) {
                    t = ss[0];
                }
            }
            colModel.setTitle(t);
            colModelList.add(colModel);
        }
        initialize(title, colModelList);
    }

    /**
     * 构造函数
     *
     * @param title   表格标题，传“空值”，表示无标题
     * @param headers 表头数组
     */
    public ExportExcel(String title, String[] headers) {
        List<ColModel> colModelList = Lists.newArrayList();
        for (String header : headers) {
            ColModel colModel = new ColModel();
            colModel.setTitle(header);
            colModelList.add(colModel);
        }
        initialize(title, colModelList);
    }


    /**
     * 构造函数
     *
     * @param title        表格标题，传“空值”，表示无标题
     * @param colModelList 表头列表
     */
    public ExportExcel(String title, List<ColModel> colModelList) {
        initialize(title, colModelList);
    }

    /**
     * 构造函数
     *
     * @param title        表格标题，传“空值”，表示无标题
     * @param colModelList 表头列表
     * @param groupHeaders 合并表头信息
     */
    public ExportExcel(String title, List<ColModel> colModelList, List<GroupHeader> groupHeaders) {
        initialize(title, colModelList, groupHeaders);
    }

    private void initialize(String title, List<ColModel> headerList) {
        initialize(title, headerList, null);
    }

    private GroupHeader findGroupHeader(List<GroupHeader> groupHeaders, String field) {
        for (GroupHeader groupHeader : groupHeaders) {
            if (groupHeader.getBeginfield().equals(field)) {
                return groupHeader;
            }
        }
        return null;
    }


    //判断是否是合并单元格
    public boolean isInMergerCellRegion(Sheet sheet, int cellRow, int cellCol) {
        boolean isMerger = false;

        int sheetMergerCount = sheet.getNumMergedRegions();
        for (int i = 0; i < sheetMergerCount; i++) {
            CellRangeAddress cra = (CellRangeAddress) sheet.getMergedRegion(i);
            // 合并单元格cell起始行
            int firstRow = cra.getFirstRow();
            // 合并单元格cell起始列
            int firstCol = cra.getFirstColumn();
            // 合并单元格cell结束行
            int lastRow = cra.getFirstColumn();
            // 合并单元格cell结束列
            int lastCol = cra.getLastColumn();

            if (cellRow >= firstRow && cellRow <= lastRow) {
                if (cellCol >= firstCol && cellCol <= lastCol) {
                    isMerger = true;
                    break;
                }
            }
        }
        return isMerger;
    }


    /**
     * 初始化函数
     *
     * @param title      表格标题，传“空值”，表示无标题
     * @param headerList 表头列表
     */
    private void initialize(String title, List<ColModel> headerList, List<GroupHeader> groupHeaders) {
        for (ColModel colModel : headerList) {
            if (!colModel.isHidden())//过滤隐藏列
                colModels.add(colModel);
        }

        this.wb = new SXSSFWorkbook(500);
        this.sheet = wb.createSheet(title != null ? title : "Export");
        this.styles = createStyles(wb);
        // Create title
        if (StringUtils.isNotBlank(title)) {
            Row titleRow = sheet.createRow(rownum++);
            titleRow.setHeightInPoints(30);
            Cell titleCell = titleRow.createCell(0);
            titleCell.setCellStyle(styles.get("title"));
            titleCell.setCellValue(title);
            sheet.addMergedRegion(new CellRangeAddress(titleRow.getRowNum(),
                    titleRow.getRowNum(), titleRow.getRowNum(), colModels.size() - 1));
        }
        // Create header
        if (Collections3.isEmpty(colModels)) {
            throw new RuntimeException("colModels not null!");
        }

        Row groupRow = null, headerRow;
        if (!Collections3.isEmpty(groupHeaders)) {
            groupRow = sheet.createRow(rownum++);
            groupRow.setHeightInPoints(16);
        }
        headerRow = sheet.createRow(rownum++);
        headerRow.setHeightInPoints(16);

        int index = 0;
        for (ColModel colModel : colModels) {
            Cell cell = headerRow.createCell(index);
            cell.setCellStyle(styles.get("header"));

            String _title = colModel.getTitle();
            String[] ss = StringUtils.split(_title, "**", 2);
            if (ss.length == 2) {
                cell.setCellValue(ss[0]);
                Comment comment = this.sheet.createDrawingPatriarch().createCellComment(
                        new XSSFClientAnchor(0, 0, 0, 0, (short) 3, 3, (short) 5, 6));
                comment.setString(new XSSFRichTextString(ss[1]));
                cell.setCellComment(comment);
            } else {
                cell.setCellValue(_title);
            }

            /*合并表头*/
            if (groupRow != null) {
                GroupHeader groupHeader = findGroupHeader(groupHeaders, colModel.getField());
                Cell cellGroup = groupRow.createCell(index);
                cellGroup.setCellStyle(styles.get("header"));
                if (groupHeader != null) {
                    cellGroup.setCellValue(groupHeader.getTitle());
                    sheet.addMergedRegion(new CellRangeAddress(groupRow.getRowNum(),
                            groupRow.getRowNum(), index, index + groupHeader.getLen() - 1));
                } else {
                    if (!isInMergerCellRegion(sheet, groupRow.getRowNum(), index)) {
                        cellGroup.setCellValue(_title);
                        cell.setCellValue("");
                        /*如果没有横向合并表头时需要合并竖向标题*/
                        sheet.addMergedRegion(new CellRangeAddress(groupRow.getRowNum(),
                                headerRow.getRowNum(), index, index));
                    }
                }
            }

            sheet.autoSizeColumn(index);
            index++;
        }

        for (int i = 0; i < colModels.size(); i++) {
            int colWidth = sheet.getColumnWidth(i) * 2;
            sheet.setColumnWidth(i, colWidth < 3000 ? 3000 : colWidth);
        }
        log.debug("Initialize success.");
    }

    /**
     * 创建表格样式
     *
     * @param wb 工作薄对象
     * @return 样式列表
     */
    private Map<String, CellStyle> createStyles(Workbook wb) {
        Map<String, CellStyle> styles = new HashMap<String, CellStyle>();

        CellStyle style = wb.createCellStyle();
        style.setAlignment(CellStyle.ALIGN_CENTER);
        style.setVerticalAlignment(CellStyle.VERTICAL_CENTER);
        Font titleFont = wb.createFont();
        titleFont.setFontName("Arial");
        titleFont.setFontHeightInPoints((short) 16);
        titleFont.setBoldweight(Font.BOLDWEIGHT_BOLD);
        style.setFont(titleFont);
        styles.put("title", style);

        style = wb.createCellStyle();
        style.setVerticalAlignment(CellStyle.VERTICAL_CENTER);
        style.setBorderRight(CellStyle.BORDER_THIN);
        style.setRightBorderColor(IndexedColors.BLUE_GREY.getIndex());
        style.setBorderLeft(CellStyle.BORDER_THIN);
        style.setLeftBorderColor(IndexedColors.BLUE_GREY.getIndex());
        style.setBorderTop(CellStyle.BORDER_THIN);
        style.setTopBorderColor(IndexedColors.BLUE_GREY.getIndex());
        style.setBorderBottom(CellStyle.BORDER_THIN);
        style.setBottomBorderColor(IndexedColors.BLUE_GREY.getIndex());
        Font dataFont = wb.createFont();
        dataFont.setFontName("Arial");
        dataFont.setFontHeightInPoints((short) 10);
        style.setFont(dataFont);
        styles.put("data", style);

        style = wb.createCellStyle();
        style.cloneStyleFrom(styles.get("data"));
        style.setAlignment(CellStyle.ALIGN_LEFT);
        styles.put("data1", style);

        style = wb.createCellStyle();
        style.cloneStyleFrom(styles.get("data"));
        style.setAlignment(CellStyle.ALIGN_CENTER);
        styles.put("data2", style);

        style = wb.createCellStyle();
        style.cloneStyleFrom(styles.get("data"));
        style.setAlignment(CellStyle.ALIGN_RIGHT);
        styles.put("data3", style);

        style = wb.createCellStyle();
        style.cloneStyleFrom(styles.get("data"));
//		style.setWrapText(true);
        style.setAlignment(CellStyle.ALIGN_CENTER);
        style.setFillForegroundColor(IndexedColors.SKY_BLUE.getIndex());
        style.setFillPattern(CellStyle.SOLID_FOREGROUND);
        Font headerFont = wb.createFont();
        headerFont.setFontName("Arial");
        headerFont.setFontHeightInPoints((short) 10);
        headerFont.setBoldweight(Font.BOLDWEIGHT_BOLD);
        headerFont.setColor(IndexedColors.BLUE.getIndex());
        style.setFont(headerFont);
        styles.put("header", style);

        return styles;
    }

    /**
     * 添加一行
     *
     * @return 行对象
     */
    public Row addRow() {
        return sheet.createRow(rownum++);
    }


    /**
     * 添加一个单元格
     *
     * @param row    添加的行
     * @param column 添加列号
     * @param val    添加值
     * @return 单元格对象
     */
    public Cell addCell(Row row, int column, Object val) {
        return this.addCell(row, column, val, 0, Class.class);
    }

    /**
     * 添加一个单元格
     *
     * @param row    添加的行
     * @param column 添加列号
     * @param val    添加值
     * @param align  对齐方式（1：靠左；2：居中；3：靠右）
     * @return 单元格对象
     */
    public Cell addCell(Row row, int column, Object val, int align) {
        return this.addCell(row, column, val, align, Class.class);
    }

    /**
     * 添加一个单元格
     *
     * @param row    添加的行
     * @param column 添加列号
     * @param val    添加值
     * @param align  对齐方式（1：靠左；2：居中；3：靠右）
     * @return 单元格对象
     */
    public Cell addCell(Row row, int column, Object val, int align, Class<?> fieldType) {
        Cell cell = row.createCell(column);
        CellStyle style = styles.get("data" + (align >= 1 && align <= 3 ? align : ""));
        try {
            if (val == null) {
                cell.setCellValue("");
            } else if (val instanceof String) {
                cell.setCellValue((String) val);
            } else if (val instanceof Integer) {
                cell.setCellValue((Integer) val);
            } else if (val instanceof Long) {
                cell.setCellValue((Long) val);
            } else if (val instanceof Double) {
                cell.setCellValue((Double) val);
            } else if (val instanceof Float) {
                cell.setCellValue((Float) val);
            } else if (val instanceof Date) {
                DataFormat format = wb.createDataFormat();
                style.setDataFormat(format.getFormat("yyyy-MM-dd"));
                cell.setCellValue((Date) val);
            } else {
                if (fieldType != Class.class) {
                    cell.setCellValue((String) fieldType.getMethod("setValue", Object.class).invoke(null, val));
                } else {
                    cell.setCellValue((String) Class.forName(this.getClass().getName().replaceAll(this.getClass().getSimpleName(),
                            "fieldtype." + val.getClass().getSimpleName() + "Type")).getMethod("setValue", Object.class).invoke(null, val));
                }
            }
        } catch (Exception ex) {
//            log.info("Set cell value [" + row.getRowNum() + "," + column + "] error: " + ex.toString());
            cell.setCellValue(val.toString());
        }
        cell.setCellStyle(style);
        return cell;
    }

    /**
     * 添加数据（通过annotation.ExportField添加数据）
     *
     * @return list 数据列表
     */
    public <E> ExportExcel setDataList(List<E> list) {
        int clsType = 0;
        StringBuilder sb = new StringBuilder();

        for (E e : list) {
            Row row = this.addRow();
            if (log.isDebugEnabled()) sb = new StringBuilder();
            //首先判断数据类型
            if (clsType == 0) {
                if (e instanceof List) {
                    clsType = 1;
                } else if (e instanceof Map) {
                    clsType = 2;
                } else {
                    clsType = 3;
                }
            }
            if (clsType == 1) {//list
                List data = (List) e;
                for (int j = 0, k = data.size(); j < k; j++) {
                    Object cellValue = (Object)data.get(j);
                    if(cellValue!=null&&cellValue.toString().indexOf("HYPERLINK")!=-1){
                        Cell cell = row.createCell((short)j);
                        cell.setCellType(HSSFCell.CELL_TYPE_FORMULA);
                        cell.setCellFormula(cellValue.toString());
                    }else{
                        this.addCell(row, j, cellValue);
                    }

                    if (log.isDebugEnabled()) sb.append(data.get(j) + ", ");
                }
            } else if (clsType == 2) {//map
                Map<String, Object> data = (Map<String, Object>) e;
                //当列信息时直接返回
                if (colModels == null) {
                    this.addCell(row, 0, "字段映射无效，请检查代码！", 2);
                    sheet.addMergedRegion(new CellRangeAddress(row.getRowNum(),
                            row.getRowNum(), row.getFirstCellNum(), data.size() - 1));
                    return this;
                }
                int j = 0;
                for (ColModel colModel : colModels) {
                    this.addCell(row, j++, data.get(colModel.getField()), align.get(colModel.getAlign()));
                    if (log.isDebugEnabled()) sb.append(data.get(colModel.getField()) + ", ");
                }
            } else {
                int colunm = 0;
                for (Object[] os : annotationList) {
                    ExcelField ef = (ExcelField) os[0];
                    Object val = null;
                    // Get entity value
                    try {
                        if (StringUtils.isNotBlank(ef.value())) {
                            val = Reflections.invokeGetter(e, ef.value());
                        } else {
                            if (os[1] instanceof Field) {
                                val = Reflections.invokeGetter(e, ((Field) os[1]).getName());
                            } else if (os[1] instanceof Method) {
                                val = Reflections.invokeMethod(e, ((Method) os[1]).getName(), new Class[]{}, new Object[]{});
                            }
                        }
                        // If is dict, get dict label
//                        if (StringUtils.isNotBlank(ef.dictType())) {
//                            val = DictUtils.getDictLabel(val == null ? "" : val.toString(), ef.dictType(), "");
//                        }
                    } catch (Exception ex) {
                        // Failure to ignore
                        log.info(ex.toString());
                        val = "";
                    }
                    this.addCell(row, colunm++, val, ef.align(), ef.fieldType());
                    if (log.isDebugEnabled()) sb.append(val + ", ");
                }
            }
            log.debug("Write success: [" + row.getRowNum() + "] " + sb.toString());
        }
        return this;
    }

    /**
     * 输出数据流
     *
     * @param os 输出数据流
     */
    public ExportExcel write(OutputStream os) throws IOException {
        wb.write(os);
        return this;
    }

    /**
     * 输出到客户端
     *
     * @param fileName 输出文件名
     */
    public ExportExcel write(HttpServletResponse response, String fileName) throws IOException {
        response.reset();
        response.setContentType("application/x-msdownload");
        response.setHeader("Content-Disposition", "attachment; filename=" + new String(fileName.getBytes("gb2312"), "ISO8859-1"));
        write(response.getOutputStream());
        return this;
    }


    /**
     * 输出到文件
     *
     * @param name 输出文件名
     */
    public ExportExcel writeFile(String name) throws FileNotFoundException, IOException {
        FileOutputStream os = new FileOutputStream(RenFileName(name));
        this.write(os);
        return this;
    }

    /**
     * 清理临时文件
     */
    public ExportExcel dispose() {
        wb.dispose();
        return this;
    }

    /**
     * 为文件名加上文件格式后缀
     *
     * @param fileName 输出文件名
     */
    private String RenFileName(String fileName) {
        if (!StringUtils.endsWith(fileName, ".xlsx")) {
            fileName += ".xlsx";
        }
        return fileName;
    }

    /**
     * 导出测试
     */
    /*public static void main(String[] args) throws Throwable {

        List<String> headerList = Lists.newArrayList();
        for (int i = 1; i <= 10; i++) {
            headerList.add("表头" + i);
        }

        List<String> dataRowList = Lists.newArrayList();
        for (int i = 1; i <= headerList.size(); i++) {
            dataRowList.add("数据" + i);
        }

        List<List<String>> dataList = Lists.newArrayList();
        for (int i = 1; i <= 1000000; i++) {
            dataList.add(dataRowList);
        }

        ExportExcel ee = new ExportExcel("表格标题", headerList);

        ee.setDataList(dataList);

        for (int i = 0; i < dataList.size(); i++) {
            Row row = ee.addRow();
            for (int j = 0; j < dataList.get(i).size(); j++) {
                ee.addCell(row, j, dataList.get(i).get(j));
            }
        }

        ee.writeFile("target/export.xlsx");

        ee.dispose();

        log.debug("Export success.");

    }*/

    //自定义的方法,插入某个图片到指定索引的位置
    private static void insertImage(HSSFWorkbook wb,HSSFPatriarch pa,byte[] data,int row,int column,int index){
        int x1=index*250;
        int y1=0;
        int x2=x1+255;
        int y2=255;
         HSSFClientAnchor anchor = new HSSFClientAnchor(x1,y1,x2,y2,(short)column,row,(short)column,row);
         anchor.setAnchorType(2);
         pa.createPicture(anchor , wb.addPicture(data, HSSFWorkbook.PICTURE_TYPE_JPEG));
     }
        //从图片里面得到字节数组
    private static  byte[] getImageData(BufferedImage bi){
        try{
             ByteArrayOutputStream bout=new ByteArrayOutputStream();
             ImageIO.write(bi, "PNG", bout);
            return bout.toByteArray();
         }catch(Exception exe){
             exe.printStackTrace();
            return null;
         }
     }
}
